SRT←12800;
GEN 0 1 1 .999 6 .5 40 .2 100 .04 200 0 511;   
<GEN 0 1 1 0 0 0 5 .999 6 .5 40 .2 100 .04 200 0 511;   
INS 0 1;  
OSC P4 P7 B2 F1 P30;
OSC B2 P3 B2 F2 P29;
OUT B2 B1;
END; 
GEN 0 2 2 .99 1; 
INSTRUMENTS;   
BUZZ 1 7 FREQ 3
END; 
 
  < 5PG  .SCR  --  RANDOM NUMBER=     1
PLAY; 
 BUZZ      0.00     0.50 E*8   460.59 206.00
;PRINT P1;< BUZZ    1
 BUZZ      0.22     0.50 AS    790.35;
FINI;